inherited FRM_PesquisaProfissao: TFRM_PesquisaProfissao
  Left = 444
  Top = 296
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 15
  inherited gbPadrao: TAdvGroupBox
    inherited edtPesquisar: TAdvEdit
      OnKeyDown = edtPesquisarKeyDown
    end
    inherited GridPesquisar: TJvDBGrid
      Columns = <
        item
          Expanded = False
          FieldName = 'DESCRICAO'
          Title.Alignment = taCenter
          Title.Caption = 'Descri'#231#227'o da Profiss'#227'o'
          Width = 405
          Visible = True
        end>
    end
    inherited pnlTitulo: TPanel
      Caption = 'Pesquisar Lista de Profiss'#245'es'
    end
  end
  inherited sqlPesquisar: TSQLQuery
    SQL.Strings = (
      'select'
      '  a.cod_profissao,'
      '  a.descricao,'
      '  a.conselho'
      'from PROFISSAO a'
      'where a.situacao = '#39'True'#39' and'
      '          a.cod_profissao > 0')
  end
  inherited cdsPesquisar: TClientDataSet
    object cdsPesquisarCOD_PROFISSAO: TIntegerField
      FieldName = 'COD_PROFISSAO'
      Required = True
    end
    object cdsPesquisarDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      Required = True
      Size = 100
    end
    object cdsPesquisarCONSELHO: TStringField
      FieldName = 'CONSELHO'
      Size = 5
    end
  end
end
